home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / BetsyRoss.dxr / 00066_waste cards.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  1.9 KB  |  51 lines
  1. on beginSprite me
  2.   global waste
  3.   waste = []
  4.   sprite(me.spriteNum).visible = 0
  5. end
  6.  
  7. on mouseDown me
  8.   global waste
  9.   if sprite(me.spriteNum).visible = 1 then
  10.     puppetSound(3, "pickcard")
  11.     sprite(me.spriteNum).moveableSprite = 1
  12.     sprite(me.spriteNum).locZ = me.spriteNum + 1000
  13.     sprite(me.spriteNum).loc = the mouseLoc
  14.     if waste.count > 1 then
  15.       sprite(me.spriteNum - 10).member = waste[waste.count - 1].membername
  16.       sprite(me.spriteNum - 10).loc = waste[waste.count - 1].location
  17.       sprite(me.spriteNum - 10).visible = 1
  18.     else
  19.       sprite(me.spriteNum - 10).visible = 0
  20.     end if
  21.   end if
  22. end
  23.  
  24. on mouseUp me
  25.   global waste, foundation, equalvalue, hotcard, points
  26.   if (equalvalue = 1) and (hotcard <> 0) then
  27.     puppetSound(3, "pickcard")
  28.     sprite(me.spriteNum).visible = 0
  29.     sprite(hotcard).member = sprite(the clickOn).member
  30.     sprite(me.spriteNum).loc = waste[waste.count].location
  31.     waste.deleteAt(waste.count)
  32.     if waste.count > 0 then
  33.       sprite(me.spriteNum).visible = 1
  34.       sprite(me.spriteNum).member = waste[waste.count].membername
  35.     end if
  36.     if member("ftext" & string(foundation.findPos(symbol(string(hotcard))))).text <> 13 then
  37.       member("ftext" & string(foundation.findPos(symbol(string(hotcard))))).text = string(value(member("ftext" & string(foundation.findPos(symbol(string(hotcard))))).text) + foundation.findPos(symbol(string(hotcard))))
  38.       if value(member("ftext" & string(foundation.findPos(symbol(string(hotcard))))).text) > 13 then
  39.         member("ftext" & string(foundation.findPos(symbol(string(hotcard))))).text = string(value(member("ftext" & string(foundation.findPos(symbol(string(hotcard))))).text) - 13)
  40.       end if
  41.     else
  42.       member("ftext" & string(foundation.findPos(symbol(string(hotcard))))).text = "C"
  43.     end if
  44.     points = points + 15
  45.   else
  46.     puppetSound(3, "dropcard")
  47.     sprite(me.spriteNum).loc = waste[waste.count].location
  48.   end if
  49.   sprite(me.spriteNum).locZ = me.spriteNum
  50. end
  51.